home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 8 / The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO / g_quake / dropde-2.zip / SHALRATH.QC < prev    next >
Text File  |  1996-08-27  |  8KB  |  246 lines
  1. /*
  2. ==============================================================================
  3.  
  4. SHAL-RATH
  5.  
  6. ==============================================================================
  7. */
  8. $cd /raid/quake/id1/models/shalrath
  9. $origin 0 0 24
  10. $base base
  11. $skin skin
  12. $scale 0.7
  13.  
  14. $frame attack1 attack2 attack3 attack4 attack5 attack6 attack7 attack8
  15. $frame attack9 attack10 attack11
  16.  
  17. $frame pain1 pain2 pain3 pain4 pain5 
  18.  
  19. $frame death1 death2 death3 death4 death5 death6 death7
  20.  
  21. $frame    walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10
  22. $frame    walk11 walk12
  23.  
  24. void() shalrath_pain;
  25. void() ShalMissile;
  26. void() shal_stand     =[      $walk1,       shal_stand    ] {ai_stand();};
  27.  
  28. void() shal_walk1     =[      $walk2,       shal_walk2    ] {
  29. if (random() < 0.2)
  30.     sound (self, CHAN_VOICE, "shalrath/idle.wav", 1, ATTN_IDLE);
  31. ai_walk(6);};
  32. void() shal_walk2     =[      $walk3,       shal_walk3    ] {ai_walk(4);};
  33. void() shal_walk3     =[      $walk4,       shal_walk4    ] {ai_walk(0);};
  34. void() shal_walk4     =[      $walk5,       shal_walk5    ] {ai_walk(0);};
  35. void() shal_walk5     =[      $walk6,       shal_walk6    ] {ai_walk(0);};
  36. void() shal_walk6     =[      $walk7,       shal_walk7    ] {ai_walk(0);};
  37. void() shal_walk7     =[      $walk8,       shal_walk8    ] {ai_walk(5);};
  38. void() shal_walk8     =[      $walk9,       shal_walk9    ] {ai_walk(6);};
  39. void() shal_walk9     =[      $walk10,       shal_walk10    ] {ai_walk(5);};
  40. void() shal_walk10    =[      $walk11,       shal_walk11    ] {ai_walk(0);};
  41. void() shal_walk11    =[      $walk12,       shal_walk12    ] {ai_walk(4);};
  42. void() shal_walk12    =[      $walk1,       shal_walk1    ] {ai_walk(5);};
  43.  
  44. void() shal_run1     =[      $walk2,       shal_run2    ] {
  45. if (random() < 0.2)
  46.     sound (self, CHAN_VOICE, "shalrath/idle.wav", 1, ATTN_IDLE);
  47. ai_run(6);};
  48. void() shal_run2     =[      $walk3,       shal_run3    ] {ai_run(4);};
  49. void() shal_run3     =[      $walk4,       shal_run4    ] {ai_run(0);};
  50. void() shal_run4     =[      $walk5,       shal_run5    ] {ai_run(0);};
  51. void() shal_run5     =[      $walk6,       shal_run6    ] {ai_run(0);};
  52. void() shal_run6     =[      $walk7,       shal_run7    ] {ai_run(0);};
  53. void() shal_run7     =[      $walk8,       shal_run8    ] {ai_run(5);};
  54. void() shal_run8     =[      $walk9,       shal_run9    ] {ai_run(6);};
  55. void() shal_run9     =[      $walk10,       shal_run10    ] {ai_run(5);};
  56. void() shal_run10    =[      $walk11,       shal_run11    ] {ai_run(0);};
  57. void() shal_run11    =[      $walk12,       shal_run12    ] {ai_run(4);};
  58. void() shal_run12    =[      $walk1,       shal_run1    ] {ai_run(5);};
  59.  
  60. void() shal_attack1     =[      $attack1,       shal_attack2    ] {
  61. sound (self, CHAN_VOICE, "shalrath/attack.wav", 1, ATTN_NORM);
  62. ai_face();
  63. };
  64. void() shal_attack2     =[      $attack2,       shal_attack3    ] {ai_face();};
  65. void() shal_attack3     =[      $attack3,       shal_attack4    ] {ai_face();};
  66. void() shal_attack4     =[      $attack4,       shal_attack5    ] {ai_face();};
  67. void() shal_attack5     =[      $attack5,       shal_attack6    ] {ai_face();};
  68. void() shal_attack6     =[      $attack6,       shal_attack7    ] {ai_face();};
  69. void() shal_attack7     =[      $attack7,       shal_attack8    ] {ai_face();};
  70. void() shal_attack8     =[      $attack8,       shal_attack9    ] {ai_face();};
  71. void() shal_attack9     =[      $attack9,       shal_attack10   ] {ShalMissile();};
  72. void() shal_attack10    =[      $attack10,      shal_attack11   ] {ai_face();};
  73. void() shal_attack11    =[      $attack11,      shal_run1   ] {};
  74.  
  75. void() shal_pain1       =[      $pain1, shal_pain2      ] {};
  76. void() shal_pain2       =[      $pain2, shal_pain3      ] {};
  77. void() shal_pain3       =[      $pain3, shal_pain4      ] {};
  78. void() shal_pain4       =[      $pain4, shal_pain5      ] {};
  79. void() shal_pain5       =[      $pain5, shal_run1      ] {};
  80.  
  81.  
  82. void() ShalrathDead =
  83. {
  84.     monster_corpse_setup('-16 -16 -24', '16 16 -10', "progs/h_shal.mdl");
  85. };
  86.  
  87.  
  88. void() shal_death1      =[      $death1,  shal_death2     ] {};
  89. void() shal_death2      =[      $death2,  shal_death3     ] {};
  90. void() shal_death3      =[      $death3,  shal_death4     ] {};
  91. void() shal_death4      =[      $death4,  shal_death5     ] {};
  92. void() shal_death5      =[      $death5,  shal_death6     ] {};
  93. void() shal_death6      =[      $death6,  shal_death7     ] {};
  94. void() shal_death7      =[      $death7,  shal_death7    ] {ShalrathDead();};
  95.  
  96.  
  97. void() shalrath_pain =
  98. {
  99.     if (self.pain_finished > time)
  100.         return;
  101.  
  102.     sound (self, CHAN_VOICE, "shalrath/pain.wav", 1, ATTN_NORM);
  103.     shal_pain1();
  104.     self.pain_finished = time + 3;
  105. };
  106.  
  107. void() shalrath_die =
  108. {
  109. // check for gib
  110.     if (self.health < -90)
  111.     {
  112.         sound (self, CHAN_VOICE, "player/udeath.wav", 1, ATTN_NORM);
  113.         ThrowHead ("progs/h_shal.mdl", self.health);
  114.         ThrowGib ("progs/gib1.mdl", self.health);
  115.         ThrowGib ("progs/gib2.mdl", self.health);
  116.         ThrowGib ("progs/gib3.mdl", self.health);
  117.         return;
  118.     }
  119.  
  120.     sound (self, CHAN_VOICE, "shalrath/death.wav", 1, ATTN_NORM);
  121.     shal_death1();
  122.     // insert death sounds here
  123. };
  124.  
  125. /*
  126. ================
  127. ShalMissile
  128. ================
  129. */
  130. void() ShalMissileTouch;
  131. void() ShalHome;
  132. void() ShalMissile =
  133. {
  134.     local    entity     missile;
  135.     local    vector    dir;
  136.     local    float    dist, flytime;
  137.  
  138.     dir = normalize((self.enemy.origin + '0 0 10') - self.origin);
  139.     dist = vlen (self.enemy.origin - self.origin);
  140.     flytime = dist * 0.002;
  141.     if (flytime < 0.1)
  142.         flytime = 0.1;
  143.  
  144.     self.effects = self.effects | EF_MUZZLEFLASH;
  145.     sound (self, CHAN_WEAPON, "shalrath/attack2.wav", 1, ATTN_NORM);
  146.  
  147.     missile = spawn ();
  148.     missile.owner = self;
  149.  
  150.     missile.solid = SOLID_BBOX;
  151.     missile.movetype = MOVETYPE_FLYMISSILE;
  152.     setmodel (missile, "progs/v_spike.mdl");
  153.  
  154.     setsize (missile, '0 0 0', '0 0 0');        
  155.  
  156.     missile.origin = self.origin + '0 0 10';
  157.     missile.velocity = dir * 400;
  158.     missile.avelocity = '300 300 300';
  159.     missile.nextthink = flytime + time;
  160.     missile.think = ShalHome;
  161.     missile.enemy = self.enemy;
  162.     missile.touch = ShalMissileTouch;
  163. };
  164.  
  165. void() ShalHome =
  166. {
  167.     local vector    dir, vtemp;
  168.     vtemp = self.enemy.origin + '0 0 10';
  169.     if (self.enemy.health < 1)
  170.     {
  171.         remove(self);
  172.         return;
  173.     }
  174.     dir = normalize(vtemp - self.origin);
  175.     if (skill == 3)
  176.         self.velocity = dir * 350;
  177.     else
  178.         self.velocity = dir * 250;
  179.     self.nextthink = time + 0.2;
  180.     self.think = ShalHome;    
  181. };
  182.  
  183. void() ShalMissileTouch =
  184. {
  185.     if (other == self.owner)
  186.         return;        // don't explode on owner
  187.  
  188.     if (other.classname == "monster_zombie")
  189.         T_Damage (other, self, self, 110);    
  190.     T_RadiusDamage (self, self.owner, 40, world);
  191.     sound (self, CHAN_WEAPON, "weapons/r_exp3.wav", 1, ATTN_NORM);
  192.  
  193.     WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  194.     WriteByte (MSG_BROADCAST, TE_EXPLOSION);
  195.     WriteCoord (MSG_BROADCAST, self.origin_x);
  196.     WriteCoord (MSG_BROADCAST, self.origin_y);
  197.     WriteCoord (MSG_BROADCAST, self.origin_z);
  198.  
  199.     self.velocity = '0 0 0';
  200.     self.touch = SUB_Null;
  201.     setmodel (self, "progs/s_explod.spr");
  202.     self.solid = SOLID_NOT;
  203.     s_explode1 ();
  204. };
  205.  
  206. //=================================================================
  207.  
  208. /*QUAKED monster_shalrath (1 0 0) (-32 -32 -24) (32 32 48) Ambush
  209. */
  210. void() monster_shalrath =
  211. {
  212.     if (deathmatch && deathmatch < 3)
  213.     {
  214.         remove(self);
  215.         return;
  216.     }
  217.     precache_model2 ("progs/shalrath.mdl");
  218.     precache_model2 ("progs/h_shal.mdl");
  219.     precache_model2 ("progs/v_spike.mdl");
  220.     
  221.     precache_sound2 ("shalrath/attack.wav");
  222.     precache_sound2 ("shalrath/attack2.wav");
  223.     precache_sound2 ("shalrath/death.wav");
  224.     precache_sound2 ("shalrath/idle.wav");
  225.     precache_sound2 ("shalrath/pain.wav");
  226.     precache_sound2 ("shalrath/sight.wav");
  227.     
  228.     self.solid = SOLID_SLIDEBOX;
  229.     self.movetype = MOVETYPE_STEP;
  230.     
  231.     setmodel (self, "progs/shalrath.mdl");
  232.     setsize (self, VEC_HULL2_MIN, VEC_HULL2_MAX);
  233.     self.health = 400;
  234.  
  235.     self.th_stand = shal_stand;
  236.     self.th_walk = shal_walk1;
  237.     self.th_run = shal_run1;
  238.     self.th_die = shalrath_die;
  239.     self.th_pain = shalrath_pain;
  240.     self.th_missile = shal_attack1;
  241.  
  242.     self.think = walkmonster_start;
  243.     self.nextthink = time + 0.1 + random ()*0.1;    
  244.  
  245. };
  246.